﻿Public Class Bodega

    Dim ID_Bodega As Integer
    Dim Descripcion_bodega As String
    Dim ID_Tipo_Bodega As Integer

    Public Sub New()
    End Sub

    Public Sub New(ByVal id As Integer, ByVal des As String, ByVal idTB As Integer)
        Me.ID_Bodega = id
        Me.Descripcion_bodega = des
        Me.ID_Tipo_Bodega = idTB
    End Sub

    Public Property pIdBodega As Integer
        Get
            Return Me.ID_Bodega
        End Get
        Set(ByVal value As Integer)
            Me.ID_Bodega = value
        End Set
    End Property

    Public Property pDescrip As String
        Get
            Return Me.Descripcion_bodega
        End Get
        Set(ByVal value As String)
            Me.Descripcion_bodega = value
        End Set
    End Property

    Public Property pIdTBodega As Integer
        Get
            Return Me.ID_Tipo_Bodega
        End Get
        Set(ByVal value As Integer)
            Me.ID_Tipo_Bodega = value
        End Set
    End Property
End Class
